/*
 * << Haru Free PDF Library 2.0.0 >> -- line_demo.c
 *
 * Copyright (c) 1999-2006 Takeshi Kanno <takeshi_kanno@est.hi-ho.ne.jp>
 *
 * Permission to use, copy, modify, distribute and sell this software
 * and its documentation for any purpose is hereby granted without fee,
 * provided that the above copyright notice appear in all copies and
 * that both that copyright notice and this permission notice appear
 * in supporting documentation.
 * It is provided "as is" without express or implied warranty.
 *
 */

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <setjmp.h>
#include "hpdf.h"
#include "../ext/hpdf_ext.h"

static jmp_buf env;

#ifdef HPDF_DLL
void __stdcall
#else
void
#endif
	static error_handler(HPDF_STATUS error_no,
						 HPDF_STATUS detail_no,
						 void *user_data)
{
	printf("ERROR: error_no=%04X, detail_no=%u\n", (HPDF_UINT)error_no,
		   (HPDF_UINT)detail_no);
	longjmp(env, 1);
}

void draw_line(HPDF_Page page,
			   float x,
			   float y,
			   const char *label)
{
	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, x, y - 10);
	HPDF_Page_ShowText(page, label);
	HPDF_Page_EndText(page);

	HPDF_Page_MoveTo(page, x, y - 15);
	HPDF_Page_LineTo(page, x + 220, y - 15);
	HPDF_Page_Stroke(page);
}

void draw_line2(HPDF_Page page,
				float x,
				float y,
				const char *label)
{
	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, x, y);
	HPDF_Page_ShowText(page, label);
	HPDF_Page_EndText(page);

	HPDF_Page_MoveTo(page, x + 30, y - 25);
	HPDF_Page_LineTo(page, x + 160, y - 25);
	HPDF_Page_Stroke(page);
}

void draw_rect(HPDF_Page page,
			   double x,
			   double y,
			   const char *label)
{
	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, x, y - 10);
	HPDF_Page_ShowText(page, label);
	HPDF_Page_EndText(page);

	HPDF_Page_Rectangle(page, x, y - 40, 220, 25);
}

int pdf_gen_line_main(int argc, char *argv)
{
	const char *page_title = "Line Example";

	HPDF_Doc pdf;
	HPDF_Font font;
	HPDF_Page page;
	char fname[256];

	const HPDF_REAL DASH_MODE1[] = {3};
	const HPDF_REAL DASH_MODE2[] = {3, 7};
	const HPDF_REAL DASH_MODE3[] = {8, 7, 2, 7};

	double x;
	double y;
	double x1;
	double y1;
	double x2;
	double y2;
	double x3;
	double y3;

	float tw;

	strcpy(fname, argv);
	strcat(fname, "lin.pdf");

	pdf = HPDF_New(error_handler, NULL);
	if (!pdf)
	{
		printf("error: cannot create PdfDoc object\n");
		return 1;
	}

	if (setjmp(env))
	{
		HPDF_Free(pdf);
		return 1;
	}

	/* create default-font */
	font = HPDF_GetFont(pdf, "Helvetica", NULL);

	/* add a new page object. */
	page = HPDF_AddPage(pdf);

	/* print the lines of the page. */
	HPDF_Page_SetLineWidth(page, 1);
	HPDF_Page_Rectangle(page, 50, 50, HPDF_Page_GetWidth(page) - 100,
						HPDF_Page_GetHeight(page) - 110);
	HPDF_Page_Stroke(page);

	/* print the title of the page (with positioning center). */
	HPDF_Page_SetFontAndSize(page, font, 24);
	tw = HPDF_Page_TextWidth(page, page_title);
	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, (HPDF_Page_GetWidth(page) - tw) / 2,
						  HPDF_Page_GetHeight(page) - 50);
	HPDF_Page_ShowText(page, page_title);
	HPDF_Page_EndText(page);

	HPDF_Page_SetFontAndSize(page, font, 10);
hpdf_page_dash_on(page, 20,10,0x21);
	/* Draw various widths of lines. */
	HPDF_Page_SetLineWidth(page, 0);
	draw_line(page, 60, 770, "line width = 0");

hpdf_page_push(page);
hpdf_page_set_stroke_rgb(page, 100, 20, 50);
	HPDF_Page_SetLineWidth(page, 1.0);
	draw_line(page, 60, 740, "line width = 1.0");
hpdf_page_pop(page);

//hpdf_page_dash_off(page);
hpdf_custom(page, "[] 0 d\n");

	HPDF_Page_SetLineWidth(page, 2.0);
	draw_line(page, 60, 710, "line width = 2.0");

	/* Line dash pattern */
	HPDF_Page_SetLineWidth(page, 1.0);



	HPDF_Page_SetDash(page, DASH_MODE1, 1, 1);
	draw_line(page, 60, 680, "dash_ptn=[3], phase=1 -- "
							 "2 on, 3 off, 3 on...");

	HPDF_Page_SetDash(page, DASH_MODE2, 2, 2);
	draw_line(page, 60, 650, "dash_ptn=[7, 3], phase=2 -- "
							 "5 on 3 off, 7 on,...");

	HPDF_Page_SetDash(page, DASH_MODE3, 4, 0);
	draw_line(page, 60, 620, "dash_ptn=[8, 7, 2, 7], phase=0");

	HPDF_Page_SetDash(page, NULL, 0, 0);

	HPDF_Page_SetLineWidth(page, 30);
	HPDF_Page_SetRGBStroke(page, 0.0, 0.5, 0.0);

	/* Line Cap Style */
	HPDF_Page_SetLineCap(page, HPDF_BUTT_END);
	draw_line2(page, 60, 570, "PDF_BUTT_END");

	HPDF_Page_SetLineCap(page, HPDF_ROUND_END);
	draw_line2(page, 60, 505, "PDF_ROUND_END");

	HPDF_Page_SetLineCap(page, HPDF_PROJECTING_SQUARE_END);
	draw_line2(page, 60, 440, "PDF_PROJECTING_SCUARE_END");

	/* Line Join Style */
	HPDF_Page_SetLineWidth(page, 30);
	HPDF_Page_SetRGBStroke(page, 0.0, 0.0, 0.5);

	HPDF_Page_SetLineJoin(page, HPDF_MITER_JOIN);
	HPDF_Page_MoveTo(page, 120, 300);
	HPDF_Page_LineTo(page, 160, 340);
	HPDF_Page_LineTo(page, 200, 300);
	HPDF_Page_Stroke(page);

	hpdf_page_set_stroke_rgb(page, 100, 20, 50);
	hpdf_page_move_to(page, 120000-50000, 300000, 0x53);
	hpdf_page_line_to(page, 160000-50000, 340000, 0x53);
	hpdf_page_line_to(page, 200000-50000, 300000, 0x53);
	HPDF_Page_Stroke(page);
	
	hpdf_page_set_stroke_rgb(page, 100, 100, 50);
	hpdf_page_move_to(page, 120000-50000, 300000, 0x53);
	hpdf_page_line_to(page, 160000-50000, 340000, 0x53);
	hpdf_page_line_to(page, 200000-50000, 300000, 0x53);
	HPDF_Page_Stroke(page);
	
	
	hpdf_page_set_line_width(page, 1000);
	hpdf_page_cycle(page, 1200, 3000, 600,0x51);
	HPDF_Page_Stroke(page);
	
	hpdf_page_node_mode(page, 1);
	hpdf_page_rectangle(page, 120000, 300000, +60000, +60000,0x53);
	HPDF_Page_Stroke(page);
	
	
	hpdf_page_node_mode(page, 2);
	hpdf_page_rectangle(page, 200000, 300000, +60000, +60000,0x53);
	HPDF_Page_Stroke(page);
	
	HPDF_Page_SetLineWidth(page, 30);
	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, 60, 360);
	HPDF_Page_ShowText(page, "PDF_MITER_JOIN");
	HPDF_Page_EndText(page);

	//HPDF_Page_SetLineJoin(page, HPDF_ROUND_JOIN);
	hpdf_page_node_mode(page, 1);
	HPDF_Page_MoveTo(page, 120, 195);
	HPDF_Page_LineTo(page, 160, 235);
	HPDF_Page_LineTo(page, 200, 195);
	HPDF_Page_Stroke(page);

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, 60, 255);
	HPDF_Page_ShowText(page, "PDF_ROUND_JOIN");
	HPDF_Page_EndText(page);

	//HPDF_Page_SetLineJoin(page, HPDF_BEVEL_JOIN);
	hpdf_page_node_mode(page, 2);
	HPDF_Page_MoveTo(page, 120, 90);
	HPDF_Page_LineTo(page, 160, 130);
	HPDF_Page_LineTo(page, 200, 90);
	HPDF_Page_Stroke(page);

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, 60, 150);
	HPDF_Page_ShowText(page, "PDF_BEVEL_JOIN");
	HPDF_Page_EndText(page);

	/* Draw Rectangle */
	HPDF_Page_SetLineWidth(page, 2);
	HPDF_Page_SetRGBStroke(page, 0, 0, 0);
	HPDF_Page_SetRGBFill(page, 0.75, 0.0, 0.0);

	draw_rect(page, 300, 770, "Stroke");
	HPDF_Page_Stroke(page);

	draw_rect(page, 300, 720, "Fill");
	HPDF_Page_Fill(page);

	draw_rect(page, 300, 670, "Fill then Stroke");
	HPDF_Page_FillStroke(page);

	/* Clip Rect */
	HPDF_Page_GSave(page); /* Save the current graphic state */
	draw_rect(page, 300, 620, "Clip Rectangle");
	HPDF_Page_Clip(page);
	HPDF_Page_Stroke(page);
	HPDF_Page_SetFontAndSize(page, font, 13);

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, 290, 600);
	HPDF_Page_SetTextLeading(page, 12);
	HPDF_Page_ShowText(page,
					   "Clip Clip Clip Clip Clip Clipi Clip Clip Clip");
	HPDF_Page_ShowTextNextLine(page,
							   "Clip Clip Clip Clip Clip Clip Clip Clip Clip");
	HPDF_Page_ShowTextNextLine(page,
							   "Clip Clip Clip Clip Clip Clip Clip Clip Clip");
	HPDF_Page_EndText(page);
	HPDF_Page_GRestore(page);

	/* Curve Example(CurveTo2) */
	x = 330;
	y = 440;
	x1 = 430;
	y1 = 530;
	x2 = 480;
	y2 = 470;
	x3 = 480;
	y3 = 90;

	HPDF_Page_SetRGBFill(page, 0, 0, 0);

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, 300, 540);
	HPDF_Page_ShowText(page, "CurveTo2(x1, y1, x2. y2)");
	HPDF_Page_EndText(page);

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, x + 5, y - 5);
	HPDF_Page_ShowText(page, "Current point");
	HPDF_Page_MoveTextPos(page, x1 - x, y1 - y);
	HPDF_Page_ShowText(page, "(x1, y1)");
	HPDF_Page_MoveTextPos(page, x2 - x1, y2 - y1);
	HPDF_Page_ShowText(page, "(x2, y2)");
	HPDF_Page_EndText(page);

	HPDF_Page_SetDash(page, DASH_MODE1, 1, 0);

	HPDF_Page_SetLineWidth(page, 0.5);
	HPDF_Page_MoveTo(page, x1, y1);
	HPDF_Page_LineTo(page, x2, y2);
	HPDF_Page_Stroke(page);

	HPDF_Page_SetDash(page, NULL, 0, 0);

	HPDF_Page_SetLineWidth(page, 1.5);

	HPDF_Page_MoveTo(page, x, y);
	HPDF_Page_CurveTo2(page, x1, y1, x2, y2);
	HPDF_Page_Stroke(page);

	/* Curve Example(CurveTo3) */
	y -= 150;
	y1 -= 150;
	y2 -= 150;

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, 300, 390);
	HPDF_Page_ShowText(page, "CurveTo3(x1, y1, x2. y2)");
	HPDF_Page_EndText(page);

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, x + 5, y - 5);
	HPDF_Page_ShowText(page, "Current point");
	HPDF_Page_MoveTextPos(page, x1 - x, y1 - y);
	HPDF_Page_ShowText(page, "(x1, y1)");
	HPDF_Page_MoveTextPos(page, x2 - x1, y2 - y1);
	HPDF_Page_ShowText(page, "(x2, y2)");
	HPDF_Page_EndText(page);

	HPDF_Page_SetDash(page, DASH_MODE1, 1, 0);

	HPDF_Page_SetLineWidth(page, 0.5);
	HPDF_Page_MoveTo(page, x, y);
	HPDF_Page_LineTo(page, x1, y1);
	HPDF_Page_Stroke(page);

	HPDF_Page_SetDash(page, NULL, 0, 0);

	HPDF_Page_SetLineWidth(page, 1.5);
	HPDF_Page_MoveTo(page, x, y);
	HPDF_Page_CurveTo3(page, x1, y1, x2, y2);
	HPDF_Page_Stroke(page);

	/* Curve Example(CurveTo) */
	y -= 150;
	y1 -= 160;
	y2 -= 130;
	x2 += 10;

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, 300, 240);
	HPDF_Page_ShowText(page, "CurveTo(x1, y1, x2. y2, x3, y3)");
	HPDF_Page_EndText(page);

	HPDF_Page_BeginText(page);
	HPDF_Page_MoveTextPos(page, x + 5, y - 5);
	HPDF_Page_ShowText(page, "Current point");
	HPDF_Page_MoveTextPos(page, x1 - x, y1 - y);
	HPDF_Page_ShowText(page, "(x1, y1)");
	HPDF_Page_MoveTextPos(page, x2 - x1, y2 - y1);
	HPDF_Page_ShowText(page, "(x2, y2)");
	HPDF_Page_MoveTextPos(page, x3 - x2, y3 - y2);
	HPDF_Page_ShowText(page, "(x3, y3)");
	HPDF_Page_EndText(page);

	HPDF_Page_SetDash(page, DASH_MODE1, 1, 0);

	HPDF_Page_SetLineWidth(page, 0.5);
	HPDF_Page_MoveTo(page, x, y);
	HPDF_Page_LineTo(page, x1, y1);
	HPDF_Page_Stroke(page);
	HPDF_Page_MoveTo(page, x2, y2);
	HPDF_Page_LineTo(page, x3, y3);
	HPDF_Page_Stroke(page);

	HPDF_Page_SetDash(page, NULL, 0, 0);

	HPDF_Page_SetLineWidth(page, 1.5);
	HPDF_Page_MoveTo(page, x, y);
	HPDF_Page_CurveTo(page, x1, y1, x2, y2, x3, y3);
	HPDF_Page_Stroke(page);

	/* save the document to a file */
	HPDF_SaveToFile(pdf, fname);

	/* clean up */
	HPDF_Free(pdf);

	return 0;
}
